function [ hsvProcessedDicom ] = ocrColorPreprocessing( dicomImg )

hsvTransform = rgb2hsv(dicomImg);

% Define thresholds for channel 1 of hsv based on histogram settings
channel1Min = 0.979;
channel1Max = 0.110;

% Create mask based on chosen histogram thresholds
BW = ( (hsvTransform(:,:,1) >= channel1Min) | (hsvTransform(:,:,1) <= channel1Max) );

hsvProcessedDicom = dicomImg;

% Remove most elements of image not associated with axes and text
hsvProcessedDicom(repmat(~BW,[1 1 3])) = 0;


end

